Top 10k strings from Basic Tutor (1987)(Kamasoft)(sk).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
9 "24"+LDG1, 7 "2",PPR,ODK1 7 "2",PPR,ODK) 6 5 CONM=CONM+ 4 X SUR=X SUR+ 4 "2",PPR,ODK+ 4 "2",PPR,ODK): 3 CONN=CONN+ 3 ;" ": 3 "63"+ODK1, 2 XSU1=XSU1+ 2 RETIG=RETIG- 2 PPR=GOTIK: 2 EXER=EXER+ 2 CODX=CODX+ 2 CODI>X SUR 2 ;" ": 2 ;" ": 2 "BASIC M/C1" 2 "BASIC M/C" 2 "63"+FORIK, 2 "63"+CONM, 2 "62568",KAD1: 2 "62567",KAD2: 2 "35"+RETIG, 2 "22222 ": 2 "2",ZNK,ODK)="," 2 "2",ZNK,ODK)= 2 "2",PPR,ODK2+ 2 "2",PPR,ODK)=M COD 2 "2",PPR,ODK)=" 2 "2 ": 2 "10")=" " 2 2 2 1 |~BJBB~#>O\)###~ 1 xsu1=XSU1+ 1 inclair Research Lt 1 iatt=x sur 1 ense in BASI 1 codi=codi+ 1 ZVOL PROSIM 1 ZNK4=ZNK5+V: 1 ZNK1=CONN+ 1 Y = X ALEBO Y","B X 1 Y = X A SUCASTNE Y" 1 XYS1=CONM: 1 XSU1=XSU1- 1 X SUR=X SUR- 1 X SUR=CODI: 1 X SUR<CODI 1 X SUR,Y SUR; 1 UKAZOVATEL": 1 TUTOR BASIC 1987 KAMASOFT 1 Start tape, then press any key 1 STOP statemen 1 SKOK DO EDITORA" 1 RETIG=RETIG+ 1 Parameter BDBBBBBBB@ 1 PPR=GOTIK-1 1 PPR=GOSBIK- 1 OPAKOVAT " 1 ODK1=ODK1+ 1 ODK1=FORIK 1 O$="PRIKAZ": 1 O$="LOGICKA OPERACIA": 1 O$="FUNKCIA": 1 Number array: 1 NGENERUJE NAHO~ 1 MAZE PREMENNE ;POPRIPADE CLEAR A POSUVA RAMTOP NA ADRESU A 1 MA COD=M COD: 1 LOAD EDITOR A 1 LDG1=LDG1+ 1 KADR=DLIN: 1 KAD2=KADR- 1 IATP=IAT3-IAT1 1 IAT4=IAT3: 1 IAT3=IAT4-IAT3: 1 IAT3=IAT3-IAT4: 1 IAT3=IAT1: 1 IAT2=IAT3: 1 FORIK=FORIK- 1 FORIK=FORIK+ 1 FN without DE 1 End of fil 1 Character array: 1 COR3=CONM: 1 CONN=CONN/ 1 CONN=CONN- 1 CONM=FORIK 1 CONM=CONM*( 1 CODX=CODI: 1 CODR=CODR-CODX: 1 CODI=CODI+ 1 C$="napr.PRINT FN A() VOLA UZIVATELSKY DEFINOVANU FUNKCIU S NAZVOM A+VYHODNOTI JU A VYPISE VYSLEDOK NA OBAZOVKU" 1 C$="napr.FOR X=1 TO 10 STEP 2;DEFINUJE CYKLUS X RIADIACOU PREMENNOU X PRE X=1 AZ X=10 S KROKOM ZVYSOVANIA 2(AK NIE JE STEP UDANY JE 1;VID AJ PRIKAZ NEXT)" 1 C$="napr.DEF FN A()=4^5+10*7 DEFINUJE FUNKCIU S NAZVOM A ,A S TVAROM 4^5+10*7;V TVARE FUNKCIE MOZU BYT AJ PREMENNE napr.DEF FN A()=A^2+B PO ZAVOLANI FUNKCIE A(VID FN)BUDE VYHODNOTENY VYRAZ A^2+B" 1 C$="napr. DIM A(10,10...) DEFINUJE V PAMATI POCITACA CISELNE POLE(MATICU)S NAZVOM~A~A S ROZMERMI 10*10*... ;MOZE SA DEFINOVAT AJ RETAZCOVE POLE=> napr.DIM A$(3,5,7)" 1 C$="ZNAMIENKO VATSI ROVNY" 1 C$="ZNAMIENKO ROZNY" 1 C$="ZNAMIENKO MENSI ROVNY" 1 C$="ZASTAVI BEH PROGRAMU SO SPRAVOU 9 STOP statement" 1 C$="X A STLPCI Y(V TOMTO PROGRAME NEPRACUJE)": 1 C$="X A DALSI RIADOK": 1 C$="VYSLEDOK JE STLACENA KLAVESA" 1 C$="VYPISUJE NA OBRAZOVKU PROGRAM V POCITACI(MOZE BYT LIST A=>LISTUJE PROGRAM OD RIADKU A)" 1 C$="VYMAZE PROGRAM V BASICU(OD ZACIATKU BASICU PO ADRESU V SYSTEMOVEJ PREMENNEJ RAMTOP)" 1 C$="V EDITORE BOHUZIAL NEPRACUJU PRIKAZY: VERIFY~~, LOAD~~DATA,RUN,CLEAR ;PRIJEMNU ZABAVU A VELA USPECHOV TI PRAJE FIRMA KAMASOFT": 1 C$="URCUJE DATA PRE PRIKAZ READ" 1 C$="TVORI POZNAMKU PRE UZIVATELA VSETKO CO IDE ZA REM V DANOM RIADKU JE IGNOROVANE" 1 C$="TAN X-TANGENS X(X V RADIANOCH)" 1 C$="SYNTAX PODOBNE AKO LOAD ,ALE NENAHRAVA DO POCITACA ALE Z POCITACA NA MG.PASKU(SAVE~..~LINE A NAHRA NA MG.PASKU PROGRAM S TYM,ZE PO SPATNOM NAHRATI DO POCITACA SA AUTOMATICKY SPUSTI OD RIADKU A)" 1 C$="STR$ X-SPRAVI Z CISLA RETAZEC(PRIHODI UVODZOVKY)=RETAZEC ZNAKOV,KTORY BY BOL TLACENY PRI TLACENI X(JE TO OPAK FUNKCIE VAL)" 1 C$="SQR X-ODMOCNINA CISLA X" 1 C$="SPUSTA BEH PROGRAMU OD RIADKU 0 + MAZE VSETKY PREMENNE AJ OBRAZOVKU + VYKONA RESTORE RUN A PODOBNE AKO RUN ,ALE SPUSTI PROGRAM OD RIADKU A" 1 C$="SIN X-SINUS X(X V RADIANOCH)" 1 C$="SGN X-ZNAMIENKO(-1 PRE ZAPORNE CISLO,0 PRE 0,1 PRE KLADNE CISLO)" 1 C$="SCREEN$ (A,B) VYSLEDOK JE ZNAK NA RIADKU A,STLPCI B" 1 C$="ROBI KOPIU OBRAZOVKY NA TLACIAREN(ZX-PRINTER)" 1 C$="RIADKU X A STLPCA Y PODLA :128* 1 C$="RETURN-NAVRAT Z PODPROGRAMU SKACE ZA POSLEDNY PRIKAZ GOSUB" 1 C$="RETAZEC(X$)" 1 C$="READA,B NAPLNA PREMENNE A,B S DAT URCENYCH PRIKAZOM DATA A POSUVA POSICIU V ZOZNAME DAT NA DALSIE HODNOTY" 1 C$="RANDOMIZE USR X-VOLA STROJOVY PODPROGRAM NA ADRESE X PRINT USR ~X~-VYPISE ADRESU ZNAKU X V DEFINOVATELNEJ GRAFIKE(UMOZNUJE DEFINOVAT VLASTNE ZNAKY)" 1 C$="PRINT TAB A;~X~ POSUVA TLACOVU POZICIU NA STLPEC A + TLACI ZNAK X" 1 C$="PRINT PISE NA OBRAZOVKU ;PRINT~AHOJ~VYPISE AHOJ ;PRINT A VYPISE HODNOTU PREMENNEJ A ATD.(VID TAB,AT)" 1 C$="PRINT AT A,B;~X~ TLACI ZNAK X DO RIADKU A,STLPCA B" 1 C$="PRIKAZY CAT,FORMAT,MOVE,ERASE,OPEN #,CLOSE # PRACUJU LEN S MICRODRIVE" 1 C$="PRIKAZ MERGE~EXPERT~ NAHRAVA(PODOBNE AKO LOAD)DO POCITACA PROGRAM S NAZVOM EXPERT,ALE NERUSI RIADKY STAREHO PROGRAMU A PREMENNYCH S VYNIMKOU TYCH,KTORE MAJU ROVNAKE CISLA RIADKOV,ALEBO NAZVY PREMENNYCH" 1 C$="POUZIVA SA PRI SAVE,INPUT" 1 C$="POUZIVA SA PRI PRIKAZE IF" 1 C$="POUZIVA SA PRI PRIKAZE FOR,a napr.PRINT A$(1 TO 5)-VYPISE PRVYCH 5 ZNAKOV RETAZCA A$" 1 C$="POUZIVA SA PRI PRIKAZE FOR" 1 C$="POKE A,B NA ADRESU A ULOZI HODNOTU B" 1 C$="POINT (A,B) VYSLEDOK JE 1 AK JE NA OBRAZOVKE V POZICII (A,B) BOD,INAC JE VYSLEDOK 0" 1 C$="PODOBNY AKO PRINT,ALE PRACUJE S TLACIARNOU" 1 C$="PODOBNY AKO LIST,ALE PRACUJE S TLACIARNOU" 1 C$="PLOT A,B KRESLI BOD DO SURADNIC A,B(BOD 0,0 JE V LAVOM DOLNOM ROHU;ROZMERY OBRAZOVKY 255*175)" 1 C$="PEEK X-URCI HODNOTU V PAMATI NA ADRESE X" 1 C$="PAUSE A ZASTAVI PROGRAM NA A/50 SEC. AK JE STLACENE TLACITKO PROGRAM BEZI DALEJ;PAUSE 0 CAKA NA STLACENIE TLACITKA" 1 C$="OVER-SPUOSOB PREPISOVANIA ZOBRAZENYCH ZNAKOV;PRE OVER 0-UZ ZOBRAZENE ZNAKY BUDU NAHRADZOVANE NOVYMI ZNAKMI,1-NOVE ZNAKY BUDU SPLYVAT SO STARYMI ZNAKMI" 1 C$="OUT A,B VYSIELA HODNOTU B NA PORT A(OPERACIA NA UROVNI PROCESORU_OUT(A),B)" 1 C$="NOT X-VYSLEDOK JE 0 AK X 1 C$="NEXT X ZVYSUJE PREMENNU X O KROK ZADANY V PRIKAZE FOR A BEH PROGRAMU VRACIA ZA PRIKAZ FOR(VID PRIKAZ FOR)" 1 C$="NASTAVUJE POZICIU PRE ODBER DAT NA RIADOK NASLEDUJUCI ZA PRIKAZOM RESTORE" 1 C$="NASTAVUJE GENERATOR NAHODNYCH CISEL(NIE JE KLUCOVY PRIKAZ)VID RND" 1 C$="NASTAVI FARBU PODKLADU(PAPIERU) PODLA CISLA ZA PRIKAZOM(0-CIERNO,1-MODRO,2-CERVENO,3-FIALOVO,4-ZELENO,5-SLAB.MODRO,6-ZLTO,7-BIELO,8-PRIEHLADNE,9-KONTRASTNE)" 1 C$="NASTAVI FARBU PISMA(INKOUSTU) PODLA CISLA ZA PRIKAZOM(0-CIERNO,1-MODRO,2-CERVENO,3-FIALOVO,4-ZELENO,5-SLAB.MODRO,6-ZLTO,7-BIELO,8-PRIEHLADNE,9-KONTRASTNE)" 1 C$="NASTAVI FARBU OKRAJA OBRAZOVKY PODLA CISLA ZA PRIKAZOM(0-CIERNO,1-MODRO,2-CERVENO,3-FIALOVO,4-ZELENO,5-SLAB.MODRO,6-ZLTO,7-BIAEL)" 1 C$="NAPIS PRIKAZ,KTOREMU NEROZUMIES**************************************KAMASOFT**************************************************": 1 C$="MAZE PREMENNE ;POPRIPADE CLEAR A POSUVA RAMTOP NA ADRESU A" 1 C$="MAZE OBRAZOVKU" 1 C$="LUDOLFOVO CISLO 3.14159265..." 1 C$="LOGICKA OPERACIA ALEBO(napr.IF A=10 OR B=5 1 C$="LOGICKA OPERACIA A SUCASTNE(napr.IF A=10 AND B=5 1 C$="LOAD~NAZOV~ NAHRA DO POCITACA Z MG.PASKY PROGRAM S NAZVOM~NAZOV~ LOAD~..~DATA A() NAHRA CISELNE POLE LOAD~..~DATA A$()NAHRA ZNAKOOVE POLE LOAD~..~CODE NAHRA BYTES(MOZE BYT LOAD~..~CODE A=>NAHRA BYTES NA ADRESU A) LOAD~..~SCREEN$ NAHRA TV.OBRAZ" 1 C$="LN X-PRIRODZENY LOGARITMUS CISLA X" 1 C$="LET A=B DO PREMENNEJ A PRIRADI PREMENNU B(MOZU BYT AJ RETAZCOVE)" 1 C$="INVERSE-INVERZNE ZOBRAZOVANIE ZNAKOV;PRE INVERSE 0-NORMALNE ZOBRAZOVANIE ZNAKOV,1-ZNAKY BUDU ZOBRAZOVANE OPACNE;TJ. FARBOU PAPIERU NA FARBU INKOUSTU" 1 C$="INT X-CELA CAST CISLA (ZAOKRUHLENA DOLE)" 1 C$="INPUT A V LAVOM DOLNOM ROHU SA OBJAVI BLIKAJUCE L A POCITAC CAKA NA NAPLNENIE PREMENNEJ~A~ CISLOM MOZE BYT AJ INPUT A$,INPUT LINE A$..." 1 C$="IN X-TESTUJE PORT S ADRESOU X(OPERACIA NA UROVNI PROCESORU" 1 C$="IF A THEN B AK PLATI VYRAZ A POTOM JE VYKONAVANE B ;napr.IF A=10 1 C$="GOTO-SKOK;GOTO A BEH PROGRAMU BUDE POKRACOVAT OD RIADKU A" 1 C$="GOSUB A VOLA PODPROGRAM NA RIADKU A(VID RETURN)" 1 C$="GENERUJE NAHODNE CISLO" 1 C$="FLASH-BLIKANIE PISANYCH ZNAKOV;PRE FLASH 0-NEBLIKA,1-BLIKA,8-NEDA SA MENIT" 1 C$="EXP X-e^X;e=EULEROVO CISLO" 1 C$="DRAW A,B KRESLI PRIAMKU Z POSLEDNEJ POZICIE PLOT ,POSUVA X-SUR. O A , Y-SUR. O B ;POPRIPADE DRAW A,B,C KRESLI PRIAMKU S ZAKRIVENIM C STUPNOV" 1 C$="COS X-COSINUS X(X V RADIANOCH)" 1 C$="CONTINUE-POKRACUJ;POUZIVA SA PRI POUZITI BREAK=>POKRACUJE BEH PROGRAMU(SKACE NA POSLEDNY RIADOK,KTOREHO CHYBOVE HLASENIE BOLO 0)" 1 C$="CISLO(X)" 1 C$="CISLO(X) V RADIANOCH" 1 C$="CISLA(X,Y) V ZATVORKE" 1 C$="CISLA V 2-KOVEJ SUSTAVE": 1 C$="CIRCLE A,B,C KRESLI KRUZNICU O STREDE [A,B] A POLOMEROM C BODOV(RASTER OBRAZOVKY 255*175;BOD[0,0] V LAVOM DOLNOM ROHU OBRAZOVKY)" 1 C$="CHR$ X-ZNAK,KTOREHO KOD JE X" 1 C$="BRIGHT-JAS PISANYCH ZNAKOV;PRE BRIGHT 0-NORMALNY,1-ZVYSENY,8-PRIEHLADNY" 1 C$="BINARNA OPERACIA" 1 C$="BIN X-(NIE JE BIN.OPERACIA) JE TO SPOSOB ZAPISU CISLA(ZAPIS V DVOJKOVEJ SUSTAVE) napr.BIN 00000111=7" 1 C$="BEEP A,B ZAZNIE TON Z REPRODUKTORA DLHY A SEK. A VO VYSKE B NAD STREDNYM C (ALEBO POD AK JE B ZAPORNE)" 1 C$="ATTR (A,B) VYSLEDOK JE ATRIBUTOVY(FARBOVY)KOD NA RIADKU A,STLPCI B;PODLA PRAVIDLA 128*BLIKANIE+64*JAS+8*FARBA PAPIERU+FARBA INKOUSTU" 1 C$="ATN X-ARCUSTANGENS V RADIANOCH CISLA X" 1 C$="ASN X-ARCUSSINUS V RADIANOCH CISLA X" 1 C$="ARGUMENT JE ZNAK,KTOREMU JE PRIRADENY KOD" 1 C$="ARGUMENT JE RETAZEC,URCI DLZKU RETAZCA" 1 C$="ARGUMENT JE RETAZEC,KTORY VYHODNOTI BEZ UVODZOVIEK(ODHODI KRAJNE UVODZOVKY) A CAKA ZNOVA RETAZEC;napr.PRINT VAL$ ~~~A~~~ VYPISE A" 1 C$="ARGUMENT JE RETAZEC,KTORY VYHODNOTI BEZ UVODZOVIEK(ODHODI KRAJNE UVODZOVKY) A CAKA CISLO;napr.PRINT VAL ~1~ VYPISE 1" 1 C$="AKO LOAD,ALE DATA SA NEUKLADAJU DO PAMATE IBA SA S NOU POROVNAVAJU;AK JE ZISTENA ODLISNOST OBJAVI SA CHYBA R;(POUZIVA SA PO SAVE NA KONTROLU SPRAVNOSTI NAHRATIA NA MG.PASKU)" 1 C$="AK ARGOMENT JE CISLO=>VOLA STROJOVY PROGRAM NA ADRESE X,AK JE ZNAK=>ADRESA ZNAKU V DEF GRAFIKE(napr. 1 C$="ACS X-ARCUSCOSINUS V RADIANOCH CISLA X" 1 C$="ABS X-ABSOLUTNA HODNOTA CISLA X" 1 C$="A Y-STLPCA NOVEJ PRINTOVEJ POZICIE": 1 C$="A CAKA ZNOVA RETAZEC": 1 C$="A CAKA CISLO": 1 C$="1 PRE X>0)": 1 C$="-NTY POTOM JE VOLANA A VUHODNOTENA FUNKCIA DEF.PRIKAZOM 1 C$=",0 AK BOD MA FARBU PAPIERU": 1 C$=" " 1 BREAK - CONT rep!JeA 1 BHY65TGVNJU74RFCMKI83EDX 1 BASIC TUTOR BY L.KARRACH 1987 1 BASIC S 1 BASIC M/C1 1 BASIC M/C 1 BASIC 2 Zm 1 BASIC 1 1 @a a5p%uPee`%E eU`ttptt@%EpUuPr"p 1 ;"scroll?": 1 ;"VYSLEDOK" 1 ;"Start tape,then press any key" 1 ;"PO STLACENI ~R~ START PROGRAMU"; 1 ;"LOADING ERROR": 1 ;"FUNKCIA "; 1 ;"ARGUMENT"; 1 ;" PRESS ANY KEY 1 ;" POZOR SYNTAKTICKA CHYBA!!! ": 1 ;" E-EDITOR C-CONTINUE" 1 ;" BASIC EDITOR IS LOADING ": 1 ;" ";A$;" ";O$;" ": 1 ;" E-EDITOR": 1 ;" ": 1 ;" E-EDITOR": 1 ;" ": 1 ;" " 1 ;" ": 1 ; EER : 1 888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888 1 35=AK A JE ROVNE 10 POTOM SKOK NA RIADOK 35" 1 0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 1 0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 1 000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 1 000000000000000000000 1 0 , 1 AK X=0" 1 ...=AK A=10 ALEBO B=5 POTOM ...)" 1 ...=AK A=10 A SUCASTNE B=5 POTOM ...)" 1 -PREMENNYCH,KTORE 1 *Y\####"[\ 1 *****PRIKAZY*************** 1 *****FUNKCIE*********** 1 *********FUNKTIONEN************* 1 )TSR7PO_^]\[B 1 )","C","CZ CISLA RETAZEC","CZNAK,KTOREHO ASCII KOD JE X","B0 AK JE X PRAV.,1 AK NEPRAV.","NNIEJE FUN.,ALE SPOSOB ZAPISU","B X 1 (ZNK1-CONN) 1 ####B(BBB@BBB@ 1 "STOP v INPUT","FOR bez NEXT","Chybne zariadenie I/O","Chybna farba","Pouzity BREAK","Zle zvoleny RAMTOP","Skok na prikaz,ktory neexistuje","Chybny tok dat","FN bez DEF FN","Chyba v parametry","Chyba v nahravani" 1 "NGENERUJE NAHODNE CISLO","NVYSLEDOK JE STLACENA KLAVESA","NLUDOLFOVO CISLO 3.14159265"," NASLEDUJE NAZOV FUNKCIE A ARGUME","Z1 AK BOD O SUR.X,Y MA FARBU INK.","ZDO RETAZCA ULOZI ZNAK NA RIADKU","ZCISLO,KTORE DAVA ATRIBUTOVY KOD","NARGUMENT X,Y X-CICLO RIADKU","CNASTAVI POZICIU PRINT NA STLPEC","RVYHODNOTI X$ BEZ UVODZOVIEK","RASCII KOD PRVEHO ZNAKU V X$","RVYHODNOTI X$ BEZ UVODZOVIEK","RURCI DLZKU X$(POCET ZNAKOV)","A 1 "NEXT bez FOR","Nedefinovana premenna","Chybny index","Nedostatok pamate","Mimo obrazovku","Cislo prilis velke","RETURN bez GOSUB"," ","Prikaz STOP","Nevhodny argument","Cele cislo mimo rozsah","Nezmyselny prikaz v BASICU","BREAK-CONT.opakuje","Chybaju DATA","Chybne meno"," " 1 "CIERNO","MODRO","CERVENO","FIALOVO","ZELENO","CYANOVO","ZLTO","BIELO" 1 "CHODNOTA BYTE NA ADRESE X","CBYTE CITANY Z ADRESY X(PODOB. 1 "A COSINUS X","ATANGENS X","CARCUSSINUS V RADIANOCH","CARCUSCOSINUS V RADIANOCH","CARCUSTANGENS V RADIANOCH","CPRIRODZENY LOGARITMUS","CE^X (E=2.7182818)","CCELA CAST CISLA(ZAOKRUH.DOLE)","CODMOCNINA Z X","CZNAMIENKO(-1 PRE X<0,0 PRE X=0,","CABSOLUTNA HODNOTA |X|" 1 "9920+2*CONN" 1 "9919+2*F" 1 "8"),ZNK*( 1 "7")="ZNAKOVE": 1 "7")="CISELNE": 1 "65534",SADR: 1 "65534",PPR+ 1 "65534",CODX: 1 "62571",KAD1: 1 "62570",KAD2: 1 "62568",ODK: 1 "62567",CONN: 1 "62247",ODK 1 "62246",CONN: 1 "62239",CONN: 1 "62226"+ODK, 1 "62226"))= 1 "6/8",ZNK/ 1 "53"+odk)="" 1 "53"+CONM)=J$( 1 "5";"ZVOLENE O.K.(A/N)???": 1 "5";"ZADAJ FUNKCIU :" 1 "5")="#4;" 1 "46";"NEDEFINOVANE": 1 "46";" ": 1 "43"+CONM* 1 "43"+CONM): 1 "4";"Znakove pole:";: 1 "4";"Program:";: 1 "4";"Ciselne pole:";: 1 "4";"Bytes:";: 1 "35";"PREMENNE": 1 "31";" ": 1 "31")="NEDEFINOVANE": 1 "30 ": 1 "28")="101": 1 "28")+"!!!": 1 "27")="1": 1 "27")+CONM): 1 "256"*ODK+ 1 "256"*KAD1: 1 "2420"+(PPR- 1 "23678",CONM: 1 "23678"+CONM*( 1 "23677",CONN: 1 "23677"+CONN/ 1 "23638")+21 1 "23628")): 1 "234"+"a": 1 "22"-IAT4: 1 "22"-IAT2: 1 "22"-IAT1: 1 "22",F)=" " 1 "22")=" " 1 "20"+LDG1, 1 "2",ZNK,ODK1+ 1 "2",ZNK,ODK 1 "2",PPR,ZNK1 1 "2",PPR,ZNK+ 1 "2",PPR,ZNK)= 1 "2",PPR,ZNK) 1 "2",PPR,ODK)=MA COD 1 "2",PPR,ODK)=MA COD 1 "2",PPR,ODK)="J" 1 "2",PPR,ODK)="," 1 "2",PPR,ODK)="$" 1 "2",PPR,ODK)= 1 "2",PPR,ODK 1 "2",GOTIK): 1 "2",F)=" ": 1 "2",CONN)=J$( 1 "2",CONN)=" ": 1 "2",CONM,ODK+ 1 "2",CONM*( 1 "18";"K-CURSOR" 1 "17";" ": 1 "16";" ": 1 "13";"~P~ VOLBA PREMEN. PRE ZOBRAZOVANIE"; 1 "13";"~F~ PRE FUNKCIE" 1 "12",V)=" ": 1 "12")="$": 1 "11"+(codi- 1 "10";"MODE :" 1 "10",CONM)="J" 1 "10",CONM)="$" 1 "10",CONM)=" " 1 "10")=CODR 1 "10")=CODI 1 "10 ": 1 "10 ": 1 "1 ": 1 "0 ": 1 "0 ": 1 " ")=" ": 1 !k\BDBBBBBb 1 UfPDDpWUPeUPuUped@%U0efP4!`r" UU`UU UWPU%PU" q$pdD`D! 1 1982 Sinclair Research Ltd": 1 BUDU PO STARTE PROGRAMU 1 ZOBRAZOVANE 1 1 1 1 1 1 1 1 1